{
fecha = "";
pais = "";
planta = "";
status = "";
trk_i = "";
trk_n = "";
FS="<td>";
tipo = "I";
contador = 0;
if ( match($0,"</span></p>") == 78) trk_i = substr($0,(match($0,"</span></p>") - 13),13);
while (getline > 0)
{
  if ( match($0,"</span></p>") == 78) trk_i = substr($0,(match($0,"</span></p>") - 13),13);
  if ( match($0,"<tbody>") == 3) 
  {
    z = 1;
    for (i = 2; i < (NF+1); i++){
       if (z == 1) fecha = substr($i,1,(match($i,"</td>")-1));
       if (z == 2) pais = substr($i,1,(match($i,"</td>")-1));
       if (z == 3) planta = substr($i,1,(match($i,"</td>")-1));
       if (z == 4) status = substr($i,1,(match($i,"</td>")-1));
       #if (z == 5) fecha = substr($i,1,match($i,"</td>"));
       #if (z == 6) fecha = substr($i,1,match($i,"</td>"));
       if (z == 6){ z = 1; gsub(/[\(\)'\",]/," ",status); print "INSERT IGNORE INTO DATA (trk,fecha,planta,pais,status,trk_local,reg_status) VALUES ('"trk_i"','"fecha"','"planta"','"pais"','"status"','"trk_n"','1');"; } 
       else z++;
    }	
  }
  if ( match($0,"Movimientos para el seguimiento nacional de la consulta para la pieza:") > 0) trk_n = substr($0,(match($0,"</span></p>")-16),2)""substr($0,(match($0,"</span></p>")-13),9)""substr($0,(match($0,"</span></p>")-3),2);
  if ( match($0,"<tbody>") == 11) 
  {
    z = 1;
    for (i = 2; i < (NF+1); i++){
       if (z == 1) fecha = substr($i,1,(match($i,"</td>")-1));
       if (z == 2) planta = substr($i,1,(match($i,"</td>")-1));
       if (z == 3) status = substr($i,1,(match($i,"</td>")-1));
       if (z == 4) status = status" "substr($i,1,(match($i,"</td>")-1));
       if (z == 4){ z = 1; gsub(/[\(\)'\",]/," ",status); print "INSERT IGNORE INTO DATA (trk,fecha,planta,pais,status,trk_local,reg_status) VALUES ('"trk_i"','"fecha"','"planta"','"pais"','"status"','"trk_n"','1');"; }
       else z++;
     }
  }	
  if ( match($0,"row") == 21 && match($0,"arrow") == 0 )
  {
    while ( contador < 5)
    {
    getline;
    if (tipo == "I" && contador == 0  ) { fecha = substr($0,34,(match($0,"</div>") - 34)); }
    if (tipo == "I" && contador == 1  ) { pais = substr($0,34,(match($0,"</div>") - 34)); }
    if (tipo == "I" && contador == 2  ) { planta = substr($0,34,(match($0,"</div>") - 34)); }
    if (tipo == "I" && contador == 3  ) { status = substr($0,34,(match($0,"</div>") - 34)); }
    if (tipo == "I" && contador == 4  ) { gsub(/[\(\)\;'\",]/," ",status); print "INSERT IGNORE INTO DATA (trk,fecha,planta,pais,status,trk_local,reg_status) VALUES ('"trk_i"','"fecha"','"planta"','"pais"','"status"','"trk_n"','1');"; }
    contador++;
    }
    contador = 0;
  }
  if ( match($0,"seguimiento nacional") == 50) tipo = "N";
  if ( match($0,"</strong></div>") == 98) trk_n = substr($0,(match($0,"</strong></div>") - 15),2)""substr($0,(match($0,"</strong></div>") - 12),9)""substr($0,(match($0,"</strong></div>") - 2),2);

  if ( match($0,"row") == 33 && match($0,"arrow") == 0 )
  {
    while ( contador < 5)
    {
    getline;
    if (tipo == "N" && contador == 0  ) { fecha = substr($0,40,(match($0,"</div>") - 40)); }
    if (tipo == "N" && contador == 1  ) { planta = substr($0,40,(match($0,"</div>") - 40)); }
    if (tipo == "N" && contador == 2  ) { status = substr($0,40,(match($0,"</div>") - 40)); }
    if (tipo == "N" && contador == 3  ) { status = status" "substr($0,40,(match($0,"</div>") - 40)); }
    if (tipo == "N" && contador == 4  ) { gsub(/[\(\)'\",]/," ",status); print "INSERT IGNORE INTO DATA (trk,fecha,planta,pais,status,trk_local,reg_status) VALUES ('"trk_i"','"fecha"','"planta"','"pais"','"status"','"trk_n"','1');"; }
    contador++;
    }
    contador = 0;
  }

}
}
